home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.4 Applications 1997 August / SGI IRIX 6.4 Applications 1997 August.iso / dist / mmailp.idb / usr / lib / Zmail / bin / sh-versions / showaudio.z / showaudio
Encoding:
Text File  |  1997-01-22  |  7.5 KB  |  322 lines
  1. :
  2. # Copyright (c) 1991 Bell Communications Research, Inc. (Bellcore)
  3. # 
  4. # Permission to use, copy, modify, and distribute this material 
  5. # for any purpose and without fee is hereby granted, provided 
  6. # that the above copyright notice and this permission notice 
  7. # appear in all copies, and that the name of Bellcore not be 
  8. # used in advertising or publicity pertaining to this 
  9. # material without the specific, prior written permission 
  10. # of an authorized representative of Bellcore.  BELLCORE 
  11. # MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY 
  12. # OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS", 
  13. # WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
  14.  
  15. # Conversion from C shell to Bourne shell by Z-Code Software Corp.
  16. # Conversion Copyright (c) 1992 Z-Code Software Corp.
  17. # Permission to use, copy, modify, and distribute this material
  18. # for any purpose and without fee is hereby granted, provided
  19. # that the above copyright notice and this permission notice
  20. # appear in all copies, and that the name of Z-Code Software not
  21. # be used in advertising or publicity pertaining to this
  22. # material without the specific, prior written permission
  23. # of an authorized representative of Z-Code.  Z-CODE SOFTWARE
  24. # MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY
  25. # OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS",
  26. # WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
  27.  
  28. # Brought into line with metamail 2.7 beta release Csh version
  29. # Added sox support
  30. #    Dave Shield    February 1994
  31.  
  32. if test -z "${METAMAIL_TMPDIR:-}"
  33. then
  34.         METAMAIL_TMPDIR=/tmp
  35. fi
  36.  
  37. thishost=`hostname`
  38.  
  39. AUDIOBINDIR=/u/andrew/phone-sau/bin
  40. AUDIOPHONEHOST=greenbush
  41. AUDIOPHONEHOSTLONG=greenbush.bellcore.com
  42. AUDIOLOGMAIL=greenbush.bellcore.com
  43. ORG=Bellcore
  44. STDINPUT=0
  45.  
  46. if test -x /usr/bin/remsh
  47. then
  48.             # Probably a System V based system
  49.             #  "rsh" is likely to be "restricted shell"
  50.     RSH=remsh
  51. else
  52.     RSH=rsh
  53. fi
  54. # SOX=/usr/remote/bin9/sox
  55.  
  56. if test "$1" = "-p"
  57. then
  58.     AUDIOPHONE=$2
  59.     shift
  60.     shift
  61. fi
  62.  
  63. if test "$1" = "-s"
  64. then
  65.     AUDIOSPEAKERFORCE=1
  66.     shift
  67. fi
  68.  
  69. playphone=0
  70. if test ! -z "${AUDIOPHONE:-}" -o ! -z "${AUDIOPHONEFORCE:-}"
  71. then
  72.     playphone=1
  73. fi
  74.  
  75. if test $playphone -eq 0
  76. then
  77.     if test ! -d "$AUDIOBINDIR"
  78.     then
  79.         AUDIOSPEAKERFORCE=1
  80.     fi
  81.  
  82.     if test "$1" = "-"
  83.     then
  84.         STDINPUT=1
  85.         shift
  86.     fi
  87.     if test $# -eq 0
  88.     then
  89.         STDINPUT=1
  90.     fi
  91.  
  92.     if test $STDINPUT -eq 0 -a -z "${AUDIOSPEAKERFORCE:-}" -a -z "${AUDIOPHONEFORCE:-}"
  93.     then
  94.         if test ! -z "${MM_NOTTTY:-}"
  95.         then
  96.             if test $MM_NOTTTY -eq 1
  97.             then
  98.                 MM_NOTTTY=0; export MM_NOTTTY
  99.                 xterm -e showaudio "$@"
  100.                 exit 0
  101.             fi
  102.         fi
  103.         looping=1
  104.         while test $looping -eq 1
  105.         do
  106.             echo This program can display audio on the speakers of some workstations, 
  107.             echo "or (at some sites) it can call you on the telephone.  Please choose one:"
  108.             echo ""
  109.             echo "1 -- Use the computer's speaker"
  110.             echo "2 -- Call me on the telephone"
  111.             echo ""
  112.             echo-n "Which do you prefer (1 or 2)? [1] "
  113.             read ans
  114.             if test "$ans" -eq 2
  115.             then
  116.             echo "OK, we'll use the telephone..."
  117.             AUDIOPHONEFORCE=1
  118.             echo "In the future, you can avoid this question by setting the environment variable"
  119.             echo "AUDIOPHONEFORCE to 1"
  120.             playphone=1
  121.             looping=0
  122.             elif test "$ans" -eq 1
  123.             then
  124.             echo "OK, Attempting to play the audio using your computer's speaker.."
  125.             AUDIOSPEAKERFORCE=1
  126.             echo "In the future, you can avoid this question by setting the environment variable"
  127.             echo "AUDIOSPEAKERFORCE to 1"
  128.             looping=0
  129.             else
  130.             echo "That is NOT one of your choices."
  131.             fi
  132.         done
  133.     fi
  134. fi
  135.  
  136. if test $playphone -eq 0
  137. then
  138.     audiohost=$thishost
  139.     if test ! -z "${DISPLAY:-}"
  140.     then
  141.         audiohost=`echo $DISPLAY | sed -e 's/:.*//'`
  142.         if test "$audiohost" = unix -o "$audiohost" = localhost
  143.         then
  144.             audiohost=$thishost
  145.         fi
  146.         if test -z "$audiohost"
  147.         then
  148.             audiohost=$thishost
  149.         fi
  150.     fi
  151.     if test ! -z "${AUDIOHOST:-}"
  152.     then
  153.         audiohost=$AUDIOHOST
  154.     fi
  155.  
  156.     if test ! "$audiohost" = "$thishost"
  157.     then
  158.         echo Sending audio to $audiohost...
  159.         if test ! -z "${MMS_AUDIO}"
  160.         then
  161.             if test $STDINPUT -eq 1
  162.             then
  163.                 cat | mms -host $audiohost "show audio/basic"
  164.             else
  165.                 cat "$@" | mms -host $audiohost "show audio/basic"
  166.             fi
  167.             exit 0
  168.         fi
  169.         thisprog=`(cd; whence showaudio)`
  170.         if test $STDINPUT -eq 1
  171.         then
  172.             cat | $RSH $audiohost $thisprog -s
  173.         else
  174.             cat "$@" | $RSH $audiohost $thisprog -s
  175.         fi
  176.         exit 0
  177.     fi
  178.  
  179.  
  180.     if test -f /usr/sbin/sfplay
  181.     then
  182.         if test $# -ne 0
  183.         then
  184.             exec /usr/sbin/sfplay -i mu-law chan 1 rate 8000 end "$@" 
  185.         else
  186.             cat > ${METAMAIL}/audio.$$
  187.             /usr/sbin/sfplay -i mu-law chan 1 rate 8000 end ${METAMAIL}/audio.$$
  188.             rm ${METAMAIL}/audio.$$
  189.             exit 0
  190.         fi
  191.     elif test -f /usr/bin/audioplay
  192.     then
  193.     # Solaris 2.0
  194.         /usr/bin/audioconvert -i raw,voice -f sun "$@" | /usr/bin/audioplay
  195.         exit $?
  196.     elif test -f /bin/audioplay
  197.     then
  198.     # Solaris 2.0
  199.         /bin/audioconvert -i raw,voice -f sun "$@" | /bin/audioplay
  200.         exit $?
  201.     elif test -d /usr/sony
  202.     then
  203.         dev=/dev/sb0
  204.     else
  205.         dev=/dev/audio
  206.     fi
  207.  
  208.     if test -w $dev
  209.     then
  210.         echo Playing audio on $thishost using $dev, one moment please...
  211.         if test $# -ne 0
  212.         then
  213.             if test ! -z "${SOX:-}"
  214.             then
  215.                 for ii in "$@"
  216.                 do
  217. #
  218. #  The "approved magic" to translate arbitary sounds
  219. #    to AU format is as follows:
  220. #
  221. #                $SOX -t auto $ii -c 1 -t aiff - | \
  222. #                $SOX -t aiff - -U -b -t au -c 1 -r 8000 $dev
  223. #
  224. #  But the following "direct" translation also seems to work
  225.                 $SOX -t auto $ii -c 1 -t au -c 1 -r 8000 $dev
  226.                 done
  227.             else
  228.                 cat "$@" > $dev
  229.             fi
  230.         else
  231.             if test ! -z "${SOX:-}"
  232.             then
  233.                 cat > ${METAMAIL}/audio.$$
  234. #
  235. #  See also above
  236. #
  237.                 $SOX -t auto ${METAMAIL}/audio.$$ -c 1 -t au -c 1 -r 8000 $dev
  238.             else
  239.                 cat > $dev
  240.             fi
  241.         fi
  242.         exit 0
  243.     fi
  244. fi
  245.  
  246. if test -d "$AUDIOBINDIR"
  247. then
  248.     thisprog=`whence showaudio`
  249.     if test -z "${AUDIOPHONE:-}"
  250.     then
  251.         if test ! -z "${MM_NOTTTY:-}"
  252.         then
  253.             if test $MM_NOTTTY -eq 1
  254.             then
  255.                 MM_NOTTTY=0; export MM_NOTTTY
  256.                 xterm -e $thisprog "$@"
  257.                 exit 0
  258.             fi
  259.         fi
  260.         echo This message contains audio, which can be sent to your telephone.
  261.         echo Please enter the telephone number at which you would like to hear this
  262.         echo-n "audio message as you would dial it from inside ${ORG}: "
  263.         read AUDIOPHONE
  264.     fi
  265.  
  266.     if test "$thishost" == "$AUDIOPHONEHOST" \
  267.         -o "$thishost" == "$AUDIOPHONEHOSTLONG"
  268.     then
  269.         echo Calling Phone number $AUDIOPHONE
  270.         echo "You MUST SAY HELLO when you answer the phone, or you will not hear the message."
  271.         mail -s "showaudio: `whoami` called $AUDIOPHONE" $AUDIOLOGMAIL < /dev/null
  272.         if test $STDINPUT -eq 1
  273.         then
  274.             cat $AUDIOBINDIR/../GREET.au "$@" - | $AUDIOBINDIR/play -\# $AUDIOPHONE -
  275.         else
  276.             cat $AUDIOBINDIR/../GREET.au "$@" | $AUDIOBINDIR/play -\# $AUDIOPHONE -
  277.         fi
  278.         echo All done
  279.         exit 0
  280.     else
  281.         echo Trying to rsh to $AUDIOPHONEHOST to send audio via telephone
  282.         if test $STDINPUT -eq 1
  283.         then
  284.             cat "$@" - | $RSH $AUDIOPHONEHOST $thisprog -p $AUDIOPHONE -
  285.         else
  286.             cat "$@" | $RSH $AUDIOPHONEHOST $thisprog -p $AUDIOPHONE -
  287.         fi
  288.         exit 0
  289.     fi
  290. fi
  291. echo ""
  292. echo "This message contains an audio mesage, which can not currently be"
  293. echo "played on this type of workstation.   If you log into an appropriate"
  294. echo "machine (currently a SPARCstation or Sony News workstation)"
  295. echo "and read this message there, you should be able to hear the audio"
  296. echo "message."
  297. echo ""
  298.  
  299. if test -z "${MM_NOTTY:-}"
  300. then
  301.     MM_NOTTY=0
  302. fi
  303. if test $MM_NOTTY -eq 1
  304. then
  305.     fname=/tmp/mm.aud.$$
  306. else
  307.     echo-n "Do you want to write the audio out to a file [y] ? "
  308.     read ANS
  309.     case "$ANS" in
  310.         [Nn]*)    exit 0 ;;
  311.     esac
  312.  
  313.     echo-n "File name:"
  314.     read fname
  315. fi
  316. cp $1 $fname
  317. if test $? -eq 0
  318. then
  319.     echo Wrote raw audio file: $fname
  320. fi
  321. exit 0
  322.